!  THIS PROGRAM MAKES A FILE >  'ASMDISK 4.0 MODIFIER' ]  WHICH IS THEN EXECUTABLE v     CREATED 1/10/81            BY       C. J. WELMAN    SANTA ANA CA 92707 
 D$(4)  D$;"OPEN ASMDISK 4.0 MODIFIER" 	 D$;"WRITE ASMDISK 4.0 MODIFIER" S	(  GET INTO MAIN BOARD ROM--OTHERWISE ASSEMBLER BOMBS WHEN CALLED ^	2 "INT" 	<  TURN ON 'MON' TO SEE ACTION 	F "MON C,I,O" 	P  BLOAD THE ASSEMBLER 	Z "BLOAD ASMDISK 4.0" 	d  GET INTO THE MONITOR 	n "CALL-151" 
x  UNLOCK BANK 1 OF LANG CARD 
 "C089" (
 "C089" F
  BLOAD BLOCK MOVE & COPY e
 "BLOAD BMC A$D001,A$D001" z
  BLOAD EDITASM  
 "BLOAD EDITASM A$D13C,A$DI3C" 
  WRITE PROTECT LANG CARD  
 "C08A"   ADD ROUTINE TO TURN ON BANK 1 OF LANGUAGE CARD EACH TIME $1010 IS CALLED , "101C:20 CC 24" M "24CC:AC 88 C0 20 80 1F 60"   MODIFY ASSEMBLER TO ADD 'NEW.NML'/'MY.NML' ROUTINES & LOCAL VARIABLES FROM 'B.EDIT2' (NOT LOCATED THERE ANY MORE)  "24D3:20 D9 24 4C 26 10 A0 00 20 8D 12 20 4A 11" %"24E1:4C 66 10 00 00 00 00 00 00 00" I PATCH ASSEMBLER 'NML' SECTION ^"1063:4C D3 24" m""1078:4C" ,"1125:60 EA EA" 6 MODIFY ASSEMBLER COMMAND TABLE TO REPLACE 'LOAD' WITH 'COPY' & 'SAVE' WITH 'EDIT'   @"1246:43 4F 50 00 D0" 
J"126E:45 44 49 3B D1" A
T MODIFY ASSEMBLER TO ADD '.DA WITH COMMA" V
^"20D4:4C B0 24" k
h"20D7:4C C7 24" 
r"20DA:4C B5 24" 
|"24B0:A5 DB 20 FA 19 A5 DC 20 FA 19 20 8B 12 C9 2C" 
"24BF:F0 03 4C 8E 18 4C B5 20 A5 DB 18 90 EB" ' PATCH 'PRT' VECTOR TO POINT TO SYMBOL TABLE AT $1E4E <"1009:4C 4E 1E" T TURN OF 'MON' NOW g"NOMON C,I,O"  JUMP TO ASSEMBLER "1000G" D$;"CLOSE ASMDISK 4.0 MODIFIER"   
